Linux Cubed Series 7: Sunsite/Linux Cubed Series 7 - Sunsite Vol 1.iso/system/admin/linuxcon.000/linuxcon/linuxconf-1.6/dialog/textbox.c

C/C++ Source or Header | 1996-08-01 | 4.5 KB | 260 lines

#include "diadef.h"
#include "dialog.h"
#include "internal.h"


class FIELD_TEXTBOX: public FIELD_STRING{
    /*~PROTOBEG~ FIELD_TEXTBOX */
public:
    FIELD_TEXTBOX (char *_buf);
    void drawtxt (WINDOW *dialog);
    void html_draw (int);
    int html_validate (int);
    /*~PROTOEND~ FIELD_TEXTBOX */
};

PUBLIC FIELD_TEXTBOX::FIELD_TEXTBOX(
    char *_buf)
    : FIELD_STRING ("",_buf,strlen(_buf))
{
    readonly = 1;
    box.width = strlen(buf);
    if (box.width > 75) box.width = 75;
}

/*
    Draw one text string if its len > 0
*/
static void textbox_drawif(
    char *start,
    char *instr,
    WINDOW *dialog)
{
    if (start != instr){
        char tmp = *instr;
        *instr = '\0';
        wattrset(dialog, inputbox_attr);
        waddstr (dialog,start);
        *instr = tmp;
    }
}


static int hoffset = 0;
/*
    Draw only the input part of a field
*/
PUBLIC void FIELD_TEXTBOX::drawtxt (WINDOW *dialog)
{
    int blank_start = 0;
    wmove(dialog, box.y,box.x);
    const int box_width = box.width;
    if (hoffset < size){
        /* #Specification: textbox / underlining and highlit
            Text may contain underlining commands
            and highliting commands built using the
            backspace character.

            #
            Highlit  : X^HX
            Underline: X^H_
            #
        */
        char *instr = buf;
        int offset = 0;
        while (*instr != '\0' && offset < hoffset){
            if (*instr == 8){
                offset -= 2;
                instr++;
            }
            offset++;
            instr++;
        }
        char *start = instr;
        while (*instr != '\0' && blank_start < box_width){
            if (instr[1] == 8){
                textbox_drawif (start,instr,dialog);
                if (instr[0] == '_'){
                    // Underline ... does not work
                    wattrset(dialog, A_UNDERLINE);
                    waddch (dialog,instr[2]);
                }else{
                    // Highlit
                    wattrset(dialog, button_active_attr);
                    waddch (dialog,instr[0]);
                }
                instr += 2;
                start = instr+1;
            }
            blank_start++;
            instr++;
        }
        textbox_drawif (start,instr,dialog);
    }
    wattrset(dialog, inputbox_attr);
    for (int i=blank_start; i<box_width; i++) waddch (dialog,' ');
}
PUBLIC void FIELD_TEXTBOX::html_draw (int )
{
    html_printf ("<tr><td>%s\n",buf);
}
PUBLIC int FIELD_TEXTBOX::html_validate (int )
{
    return 0;
}

/*
    Expand tab character (8) and translate some others
*/
void textbox_expandtab(
    const char *src,
    char *dst,
    int maxsiz)
{
    int pos = 0;
    while (*src != '\0' && pos < maxsiz){
        char carac = *src++;
        if (carac == '\t'){
            if (pos % 8 == 0){
                pos++;
                *dst++ = ' ';
            }
            while (pos % 8){
                pos++;
                *dst++ = ' ';
            }
        }else if (carac == 7){
            // Some bullets placed by linuxdoc-sgml
            *dst++ = '-';
        }else{
            *dst++ = carac;
            pos++;
        }
    }
    *dst = '\0';
}

class  DIALOG_TEXTBOX: public DIALOG{
    /*~PROTOBEG~ DIALOG_TEXTBOX */
public:
    DIALOG_TEXTBOX (void);
protected:
    int keymove (WINDOW *dialog,
         int key,
         int &nof);
public:
    /*~PROTOEND~ DIALOG_TEXTBOX */
};

PUBLIC DIALOG_TEXTBOX::DIALOG_TEXTBOX()
{
    hoffset = 0;
}



PROTECTED int DIALOG_TEXTBOX::keymove (WINDOW *dialog, int key, int &nof)
{
    int ret = 0;
    switch (key){
    case KEY_HOME:
        if (hoffset > 0){
            hoffset = 0;
            drawf (dialog);
        }
        break;
    case KEY_LEFT:
        if (hoffset > 0){
            hoffset--;
            drawf (dialog);
        }
        break;
    case KEY_RIGHT:
        hoffset++;
        drawf (dialog);
        break;
    case KEY_DOWN:
        // Force a scroll
        nof = offset + nbvisible-1;
        ret = DIALOG::keymove (dialog,key,nof);
        nof = offset;
        break;
    case KEY_UP:
        // Force a scroll
        nof = offset;
    default:
        ret = DIALOG::keymove (dialog,key,nof);
    }
    return ret;
}
/*
    Display text from a file in a dialog box.
*/
MENU_STATUS dialog_textbox(
    const char *title,
    const char *file)
{
    FILE *fin = xconf_fopen (file,"r");
    MENU_STATUS ret = MENU_ESCAPE;
    if (fin != NULL){
        DIALOG_TEXTBOX dia;
        char buf[300];
        while (fgets(buf,sizeof(buf)-1,fin)!=NULL){
            str_strip (buf,buf);
            char buftab[600];
            textbox_expandtab (buf,buftab,sizeof(buftab)-1);
            dia.add (new FIELD_TEXTBOX(buftab));
        }
        fclose (fin);
        int nof = 0;
        ret = dia.edit (title,NULL,NULL,nof,MENUBUT_QUIT);
    }
    return ret;
}

/*
    Display text from a table of strings.
*/
MENU_STATUS dialog_textbox(
    const char *title,
    const SSTRINGS &strs)
{
    DIALOG_TEXTBOX dia;
    for (int i=0; i<strs.getnb(); i++){
        SSTRING *str = strs.getitem(i);
        char buf[600];
        str->copy (buf);
        str_strip (buf,buf);
        char buftab[600];
        textbox_expandtab (buf,buftab,sizeof(buftab)-1);
        dia.add (new FIELD_TEXTBOX(buftab));
    }
    int nof = 0;
    return dia.edit (title,NULL,NULL,nof,MENUBUT_QUIT);
}


#ifdef TEST

int main (int argc, char *argv[])
{
    int ret;
    init_dialog();
    ret  = dialog_textbox("file /tmp/toto.c"
        ,"/tmp/toto.c"
        ,15,50);
    endwin();
    printf ("ret = %d\n",ret);
    return 0;
}

#endif